home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 10 / CU Amiga Magazine's Super CD-ROM 10 (1997-03-15)(EMAP Images)(GB)(Track 1 of 3)[!][issue 1997-05][50887 CUAM10].iso / CUCD / Utilities / RO / ARexx / LoadDir.RO < prev    next >
Text File  |  1997-01-12  |  454b  |  30 lines
  1. /* 
  2.  
  3.    $VER: LoadDir.RO 0.2
  4.  
  5.    Author:
  6.     Oliver Rummeyer (oliver.rummeyer@student.uni-ulm.de)
  7.  
  8.    Function:
  9.     Loads the specified directory in the active listview.
  10.  
  11.    Requires:
  12.     RO 0.90 or newer
  13.  
  14.    Example:
  15.     Rx >NIL: REXX:RO/LoadDir.RO System:Devs/DOSDrivers RO.1
  16.  
  17. */
  18.  
  19. PARSE ARG Directory PortName
  20.  
  21. IF PortName="" THEN
  22.  PortName='RO.1'
  23. ELSE
  24.  PortName=STRIP(PortName)
  25.  
  26. ADDRESS VALUE PortName
  27. OPTIONS RESULTS
  28.  
  29. 'Load Active "'||Directory||'"'
  30.